home *** CD-ROM | disk | FTP | other *** search
/ IRIX Base Documentation 2001 May / SGI IRIX Base Documentation 2001 May.iso / usr / share / catman / p_man / cat3 / f90 / shape.z / shape
Encoding:
Text File  |  1998-10-30  |  1.5 KB  |  40 lines
  1. SHAPE(3I)                                              Last changed: 1-6-98
  2.  
  3.  
  4. NNAAMMEE
  5.      SSHHAAPPEE - Returns the shape of an array or a scalar
  6.  
  7. SSYYNNOOPPSSIISS
  8.      SSHHAAPPEE (([SSOOUURRCCEE==]_s_o_u_r_c_e))
  9.  
  10. IIMMPPLLEEMMEENNTTAATTIIOONN
  11.      UNICOS, UNICOS/mk, and IRIX systems
  12.  
  13. SSTTAANNDDAARRDDSS
  14.      Fortran 90
  15.  
  16. DDEESSCCRRIIPPTTIIOONN
  17.      The SSHHAAPPEE intrinsic function returns the shape of an array or a
  18.      scalar.  It accepts the following argument:
  19.  
  20.      _s_o_u_r_c_e    May be of any type.  It can be array valued or scalar.  It
  21.                must not be a pointer that is disassociated or an
  22.                allocatable array that is not allocated.  It must not be an
  23.                assumed-size array.
  24.  
  25.      SSHHAAPPEE is an inquiry function.  The name of this intrinsic cannot be
  26.      passed as an argument.
  27.  
  28. RREETTUURRNN VVAALLUUEESS
  29.      The result is a default integer array of rank 1 whose size is equal to
  30.      the rank of _s_o_u_r_c_e.  The value of the result is the shape of _s_o_u_r_c_e.
  31.  
  32. EEXXAAMMPPLLEESS
  33.      The value of SSHHAAPPEE((AA((22::55,, --11::11)))) is [4, 3].  The value of SSHHAAPPEE((33)) is
  34.      the rank -1 array of size 0.
  35.  
  36. SSEEEE AALLSSOO
  37.      _I_n_t_r_i_n_s_i_c _P_r_o_c_e_d_u_r_e_s _R_e_f_e_r_e_n_c_e _M_a_n_u_a_l, publication SR-2138, for the
  38.      printed version of this man page.
  39.  
  40.